perm filename MAPARY.SAI[1,BGB] blob sn#001262 filedate 1972-10-22 generic text, type T, neo UTF8
00100	ENTRY	DUMMY;
00200	BEGIN	"MAP DATA"
00300		DEFINE α = "COMMENT";
00400	PRELOAD_WITH
00500	0.0,		0.0,		440.0,		20.504,		-10.420,	440.0,
00600	-1.959,		-25.927,	440.0,		20.329,		-37.253,	440.0,		
00700	564.983,	-296.702,	440.0,		591.290,	-321.277,	440.0,		
00800	746.979,	-91.681,	440.0,		772.915,	28.348,		440.0,		
00900	809.454,	-5.783,		440.0,		835.761,	-30.357,	440.0,	
01000	1053.148,	-233.423,	440.0,		938.159,	47.904,		440.0,
01100	924.538,	81.228,		440.0,		892.353,	66.60,		440.0,
01200	868.701,	110.112,	440.0,		874.668,	67.650,		440.0,		
01300	835.598,	72.640,		440.0,		842.664,	46.213,		440.0,
01400	808.453,	63.520,		440.0,		679.103,	238.451,	440.0,		
01500	669.648,	229.528,	440.0,		660.194,	220.605,	440.0,		
01600	396.938,	-27.863,	440.0,		383.858,	333.895,	440.0,		
01700	383.388,	346.886,	440.0,		382.919,	359.878,	440.0,		
01800	286.292,	269.81,		440.0,		387.902,	221.970,	440.0,		
01900	293.391,	161.874,	440.0,		323.826,	101.997,	440.0,		
02000	343.83,		32.779,		440.0,		310.63,		-184.491,	440.0,		
02100	205.710,	-304.197,	440.0,		147.653,	-336.274,	440.0,		
02200	-126.909,	-326.987,	440.0,		-137.607,	-321.550,	440.0,		
02300	-290.626,	147.691,	440.0,		-242.498,	217.878,	440.0,		
02400	-101.71,	309.936,	440.0,		-34.423,	324.177,	440.0,		
02500	83.882,		315.25,		440.0,		176.592,	309.172,	440.0,		
02600	240.444,	327.181,	440.0,		245.686,	315.285,	440.0,		
02700	243.472,	300.233,	440.0,		180.71,		283.406,	440.0,		
02800	178.167,	274.164,	440.0,		227.583,	238.290,	440.0,		
02900	252.173,	246.904,	440.0,		262.705,	280.18,		440.0,		
03000	243.472,	300.233,	440.0,		276.281,	84.789,		440.0,
03100	262.114,	80.441,		440.0,		264.129,	73.553,		440.0,
03200	276.460,	69.242,		440.0,		293.921,	73.615,		440.0,
03300	299.625,	92.494,		440.0,		282.421,	154.898,	440.0,		
03400	271.450,	147.923,	440.0,		210.531,	218.663,	440.0,		
03500	164.786,	251.872,	440.0,		144.826,	262.916,	440.0,		
03600	135.912,	267.447,	440.0,		150.716,	274.506,	440.0,		
03700	141.801,	279.36,		440.0,		80.537,		302.463,	440.0,		
03800	77.191,		289.901,	440.0,		-31.677,	298.322,	440.0,		
03900	-30.516,	287.384,	440.0,		-44.884,	281.443,	440.0,		
04000	-43.181,	270.758,	440.0,		-28.951,	272.647,	440.0,		
04100	-36.78,		271.795,	440.0,		133.917,	256.99,		440.0,		
04200	173.678,	230.991,	440.0,		144.101,	191.654,	440.0,		
04300	141.281,	193.705,	440.0,		138.466,	195.764,	440.0,		
04400	121.523,	161.625,	440.0,		119.160,	163.376,	440.0,		
04500	116.771,	165.91,		440.0,		105.168,	139.873,	440.0,		
04600	81.91,		155.77,		440.0,		169.756,	42.517,		440.0,		
04700	173.270,	24.539,		440.0,		265.964,	66.613,		440.0,
04800	300.6,		42.489,		440.0,		317.451,	28.418,		440.0,
04900	321.986,	-19.928,	440.0,		242.0,		-21.410,	440.0,		
05000	242.965,	-101.404,	440.0,		238.148,	-99.393,	440.0,		
05100	161.577,	-201.139,	440.0,		128.135,	-192.491,	440.0,		
05200	170.546,	-212.303,	440.0,		178.643,	-206.435,	440.0,		
05300	185.197,	-213.989,	440.0,		241.124,	-148.148,	440.0,		
05400	249.645,	-153.383,	440.0,		258.651,	-157.730,	440.0,		
05500	278.175,	-163.325,	440.0,		319.559,	-95.122,	440.0,		
05600	321.981,	-99.495,	440.0,		326.367,	-101.898,	440.0,		
05700	298.474,	-178.601,	440.0,		260.913,	-235.907,	440.0,		
05800	258.736,	-230.315,	440.0,		253.170,	-228.73,	440.0,
05900	233.941,	-222.575,	440.0,		190.879,	-282.841,	440.0,		
06000	176.619,	-262.307,	440.0,		165.946,	-284.914,	440.0,		
06100	125.620,	-270.814,	440.0,		87.240,		-262.173,	440.0,		
06200	64.705,		-268.97,	440.0,		60.888,		-253.591,	440.0,		
06300	46.126,		-256.252,	440.0,	α	45.706,		-253.920,	440.0,;
06400	20.196,		-257.209,	440.0,		21.300,		-271.276,	440.0,		
06500	1.362,		-272.847,	440.0,		13.697,		-288.591,	440.0,		
06600	6.469,		-294.250,	440.0,		13.866,		-303.698,	440.0,		
06700	55.578,		-283.450,	440.0,		91.362,		-274.43,	440.0,		
06800	93.980,		-321.794,	440.0,		122.668,	-283.532,	440.0,		
06900	141.547,	-290.133,	440.0,		129.799,	-299.460,	440.0,		
07000	137.467,	-312.352,	440.0,		-115.130,	-303.808,	440.0,		
07100	-125.828,	-298.372,	440.0,		-267.448,	135.912,	440.0,		
07200	-260.12,	149.645,	440.0,		-247.12,	142.163,	440.0,		
07300	-239.187,	154.966,	440.0,		-146.869,	95.154,		440.0,
07400	-136.119,	109.985,	440.0,		-45.474,	168.988,	440.0,
07500	-27.561,	172.816,	440.0,		232.600,	58.257,		440.0,
07600	231.699,	61.626,		440.0,		230.807,	64.997,		440.0,
07700	196.156,	49.129,		440.0,		195.420,	51.977,		440.0,
07800	194.644,	54.813,		440.0,		93.702,		179.194,	440.0,		
07900	96.299,		177.812,	440.0,		98.874,		176.393,	440.0,		
08000	111.112,	212.487,	440.0,		114.176,	210.822,	440.0,		
08100	117.245,	209.165,	440.0,		-26.25,		200.533,	440.0,		
08200	-28.939,	200.133,	440.0,		-31.847,	199.691,	440.0,		
08300	-30.861,	237.790,	440.0,		-34.312,	237.287,	440.0,		
08400	-37.764,	236.792,	440.0,		-52.546,	195.268,	440.0,		
08500	-55.380,	194.483,	440.0,		-58.203,	193.657,	440.0,		
08600	-62.308,	231.547,	440.0,		-65.661,	230.588,	440.0,		
08700	-69.16,		229.637,	440.0,		-186.509,	150.702,	440.0,		
08800	-184.275,	153.379,	440.0,		-182.47,	156.63,		440.0,
08900	-157.287,	127.90,		440.0,		-155.422,	129.364,	440.0,		
09000	-153.524,	131.611,	440.0,		-213.262,	172.319,	440.0,		
09100	-208.678,	177.843,	440.0,		-203.951,	183.244,	440.0,		
09200	-221.678,	179.119,	440.0,		-214.975,	193.149,	440.0,		
09300	-212.0,		190.476,	440.0,		-223.158,	200.501,	440.0,		
09400	-93.10,		285.217,	440.0,		-89.599,	274.759,	440.0,		
09500	-88.359,	270.956,	440.0,		-85.5,		260.670,	440.0,		
09600	-78.152,	262.805,	440.0,		-71.246,	264.761,	440.0,		
09700	-74.57,		275.209,	440.0,		144.872,	544.40,		440.0,
09800	81.682,		-390.307,	440.0,		690.652,	-366.950,	440.0,		
09900	624.297,	-334.192,	440.0,		249.96,		286.327,	440.0,		
10000	237.420,	249.614,	440.0,		180.741,	278.451,	440.0,		
10100	277.746,	242.206,	440.0,		-30.93,		283.406,	440.0,		
10200	302.469,	27.693,		440.0,		285.953,	86.324,		440.0,
10300	45.706,		-253.92,	440.0;
10400	INTERNAL REAL ARRAY LOCII[0:400,1:3];
     

00100	PRELOAD_WITH
00200	4,	5,		α 1;
00300	8,	9,		α 2;
00400	5,	9,		α 3;
00500	4,	8,		α 4;
00600	11,	12,		α 5;
00700	16,	18,		α 6;
00800	18,	21,		α 7;
00900	16,	19,		α 8;
01000	17,	20,		α 9;
01100	19,	21,		α 10;
01200	23,	25,		α 11;
01300	26,	49,		α 12;
01400	191,	48,		α 13;
01500	28,	58,		α 14;
01600	47,	59,		α 15;
01700	46,	60,		α 16;
01800	43,	50,		α 17;
01900	42,	43,		α 18;
02000	41,	45,		α 19;
02100	63,	64,		α 20;
02200	61,	62,		α 21;
02300	40,	66,		α 22;
02400	39,	67,		α 23;
02500	38,	177,		α 24;
02600	37,	176,		α 25;
02700	36,	132,		α 26;
02800	130,	131,		α 27;
02900	34,	35,		α 28;
03000	35,	131,		α 29;
03100	33,	129,		α 30;
03200	32,	109,		α 31;
03300	111,	112,		α 32;
03400	113,	114,		α 33;
03500	117,	195,		α 34;
03600	116,	195,		α 35;
03700	117,	118,		α 36;
03800	121,	122,		α 37;
03900	123,	124,		α 38;
04000	126,	127,		α 39;
04100	107,	108,		α 40;
04200	92,	94,		α 41;
04300	31,	104,		α 42;
04400	90,	91,		α 43;
04500	30,	87,		α 44;
04600	29,	56,		α 45;
04700	84,	86,		α 46;
04800	55,	85,		α 47;
04900	142,	145,		α 48;
05000	51,	52,		α 49;
05100	74,	75,		α 50;
05200	77,	80,		α 51;
05300	148,	151,		α 52;
05400	73,	149,		α 53;
05500	152,	155,		α 54;
05600	68,	71,		α 55;
05700	139,	154,		α 56;
05800	138,	158,		α 57;
05900	160,	163,		α 58;
06000	178,	180,		α 59;
06100	166,	169,		α 60;
06200	172,	174,		α 61;
06300	137,	167,		α 62;
06400	135,	136,		α 63;
06500	87,	88,		α 64;
06600	132,	133,		α 65;
06700	120,	121,		α 66;
06800	85,	140,		α 47B	67;
06900	140,	143,		α 47C	68;
07000	143,	83,		α 47D	69;
07100	75,	78,		α 50B	70;
07200	78,	81,		α 50C	71;
07300	149,	146,		α 53B	72;
07400	82,	146,		α 53C	73;
07500	157,	154,		α 56B	74;
07600	157,	70,		α 56C	75;
07700	69,	70,		α 56D	76;
07800	158,	161,		α 57B	77;
07900	161,	182,		α 57C	78;
08000	182,	183,		α 57D	79;
08100	164,	167,		α 62B	80;
08200	164,	170,		α 62C	81;
08300	170,	173;		α 62D	82;
08400	INTERNAL INTEGER ARRAY SEGS[1:300,1:2];
     

00100	PRELOAD_WITH
00200	9,	11,	10,		α 1;
00300	12,	13,	10,		α 2;
00400	8,	18,	7,		α 3;
00500	13,	16,	14,		α 4;
00600	21,	23,	22,		α 5;
00700	20,	24,	22,		α 6;
00800	19,	25,	22,		α 7;
00900	23,	26,	27,		α 8;
01000	24,	57,	27,		α 9;
01100	24,	43,	22,		α 10;
01200	25,	42,	22,		α 11;
01300	42,	41,	184,		α 12;
01400	43,	65,	184,		α 13;
01500	44,	45,	184,		α 14;
01600	45,	46,	190,		α 15;
01700	46,	47,	2,		α 16;
01800	47,	48,	189,		α 17;
01900	48,	49,	27,		α 18;
02000	49,	50,	188,		α 19;
02100	26,	191,	27,		α 20;
02200	191,	28,	27,		α 21;
02300	59,	60,	2,		α 22;
02400	60,	61,	2,		α 23;
02500	57,	63,	2,		α 24;
02600	58,	59,	2,		α 25;
02700	62,	66,	0,		α 26;
02800	64,	65,	0,		α 27;
02900	40,	41,	184,		α 28;
03000	56,	58,	2,		α 29;
03100	28,	29,	2,		α 30;
03200	57,	103,	2,		α 31;
03300	84,	83,	0,		α 32;
03400	83,	81,	0,		α 33;
03500	81,	82,	0,		α 34;
03600	82,	139,	0,		α 35;
03700	138,	139,	0,		α 36;
03800	138,	137,	0,		α 37;
03900	136,	137,	0,		α 38;
04000	133,	135,	134,		α 39;
04100	36,	37,	0,		α 40;
04200	173,	176,	175,		α 41;
04300	170,	172,	171,		α 42;
04400	164,	166,	165,		α 43;
04500	167,	169,	168,		α 44;
04600	158,	160,	159,		α 45;
04700	161,	163,	162,		α 46;
04800	180,	182,	181,		α 47;
04900	177,	183,	179,		α 48;
05000	38,	39,	0,		α 49;
05100	67,	69,	192,		α 50;
05200	70,	71,	72,		α 51;
05300	155,	157,	156,		α 52;
05400	152,	154,	153,		α 53;
05500	68,	73,	0,		α 54;
05600	73,	74,	0,		α 55;
05700	75,	77,	76,		α 56;
05800	149,	151,	150,		α 57;
05900	78,	80,	79,		α 58;
06000	146,	148,	147,		α 59;
06100	74,	51,	0,		α 60;
06200	52,	85,	53,		α 61;
06300	140,	142,	141,		α 62;
06400	143,	145,	144,		α 63;
06500	86,	87,	193,		α 64;
06600	29,	30,	2,		α 65;
06700	55,	56,	194,		α 66;
06800	174,	178,	0,		α 67;
06900	176,	177,	0,		α 68;
07000	37,	38,	0,		α 69;
07100	39,	40,	0,		α 70;
07200	66,	67,	0,		α 71;
07300	131,	132,	1,		α 72;
07400	35,	36,	1,		α 73;
07500	129,	130,	3,		α 74;
07600	33,	34,	3,		α 75;
07700	118,	120,	119,		α 76;
07800	114,	116,	115,		α 77;
07900	122,	123,	185,		α 78;
08000	124,	126,	125,		α 79;
08100	112,	113,	125,		α 80;
08200	109,	111,	110,		α 81;
08300	127,	129,	128,		α 82;
08400	32,	33,	3,		α 83;
08500	108,	109,	93,		α 84;
08600	31,	32,	3,		α 85;
08700	99,	108,	187,		α 86;
08800	97,	99,	98,		α 87;
08900	96,	97,	0,		α 88;
09000	94,	96,	95,		α 89;
09100	91,	92,	0,		α 90;
09200	88,	90,	89,		α 91;
09300	30,	31,	2,		α 92;
09400	101,	103,	102,		α 93;
09500	101,	100,	186,		α 94;
09600	100,	107,	187,		α 95;
09700	105,	107,	106,		α 96;
09800	104,	105,	3,		α 97;
09900	103,	104,	2;		α 98;
10000	INTERNAL INTEGER ARRAY ARCS[1:300,1:3];
     

00100	PRELOAD_WITH
00200	α AROAD;		0,-1,-2,-3,-4, 
00300	α APRON;		0,-2,-5,-6,1,2,3,4,
00400	α SROAD;		0,-6,-7,-8,-10,
00500	α DCURVE;		0,-10,-11,5,7,
00600	α INFORK1;		0,-12,-13,20,18,
00700	α INFORK2;		0,-11,-12,-17,-18,8,11,19,
00800	α INFORK3;		0,-17,-18,-19,12,14,
00900	α OUTFORK1;		0,-16,-19,-22,-21,28,26,15,23,
01000	α OUTFORK2;		0,-15,-16,16,22,
01100	α OUTFORK3;		0,-13,-14,-15,17,21,25,
01200	α OUTFORK4;		0,-14,-45,29,30,
01300	α AISLE1;		0,-62,-80,-81,-81,-82,-63,-65,-25,-26,38,41,39,40,
01400	α AISLE2;		0,36,-57,-77,-78,-79,-56,-74,-75,-76,-23,-24,48,49,50,
01500	α AISLE3;		0,56,-51,58,57,-52,59,34,-52,59,34,-71,-73,55,-50,-53,
01600	α AISLE4;		0,-47,-67,-68,-69,32,-46,64,65,66,-44,-45,
01700	α NEARLOT;		0,-59,67,-61,42,-81,43,-60,44,-62,37,-57,45,-58,46,-78,47,
01800	α MIDLOT;		0,51,-75,52,-54,53,-56,35,-73,-72,-53,54,-55,
01900	α FARLOT;		0,-50,-70,-71,33,-69,63,-48,62,61,-49,-67,60,
02000	α SPUR;			0,-34,-36,76,-66,-37,78,-38,-39,77,-30,-31,-32,-33,79,80,81,82,83,
02100	α ROAD2;		0,-24,-25,68,69,
02200	α TRIFORK;		0,91,-43,90,-41,89,88,87,86,-40,95,94,93,98,-42,92,-44,-64,
02300	α ROAD5;		0,-31,-42,85,96,97,-40,84,
02400	α ROAD4;		0,-30,-27,-28,-29,74,75,
02500	α ROAD3;		0,-29,-26,72,73,
02600	α ROAD1;		0,-22,-23,70,71;
02700	INTERNAL INTEGER ARRAY CURLY[1:1000];
02800	
02900	END